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LETTERS 


A.R.C. Badcock Hants 


Users may like to know that the data separator I.C. the FDC9214B 
1S available from M.S.Components Ltd on @1-67@-4466 for £7.15 + 
VAT. I am interested in C.J. Youngs assembler is it significantly 
better to use than than R.M. Lees. Also is it possible to get a 
Single density version of the MDEX boot track BOOTSD or BOOTSS. 


Oar Youngs assembler is written in machine code so it tends to 
run faster than R.M. Lees, also it will handle very large source 
files and programmes. It does have the disadvantage however of 
not producing a list file but this facility is to be added in the 
future. The MDEX system automatically selects single or double 
density formats by trying to read a disk and if it gets an error 
trying again in the other density mode. It should therefor be 
possible to use the boot track files in either density. 


W.R. Bucknall sheffield 


I enclose copy of data manuals for Cannon MD11@-220 drives for 
you to hold for other members that may require more information. 
Also Im looking forward to recieving MDEX Pascal from you as we 
are studying it here. a 


If any one would like a copy of the Cannon drives data manual 
Please send £1.@@ to cover photocopying. 2 


W.D. Eaves Caithness 


I have no mains switch for my Cortex Mk II and cannot find one 
that will fit the cutout, can you supply a suitable switch 7? 
What type of connector is required for the’  E.Bus. I have my 
Centronics interface connected by vero pins through the main 
Pel. Be in place of the connector. However I would like to add a 
backplane to enable the use of the Centronics board and other 
expansion boards but there is no way to get the E.Bus connector 
out of the case. Are you supposed to cut a hole ? — 

In some past newsletter there has been mentioned a communications 
package called Commtex is it still available and what hardware is 
required. 


The mains switch for the Mk II Cortex is R.S. Components”) stock 
number 337-223 and is available from the user Group for £1.0@ inc 
The E.Bus connector is a DIN 41612 64 way a/c plug. The best way 
to connect up a backplane is to use a short length of ribbon 
cable from a mating socket. This will have to be passed through a 
hole cut in the side of the case. The Commtex package is now 
available from the group for £5.@@ on disc. It will support all 
normal modems V21/23/24 etc and uses the serial port of the 
cortex for connection to the modem. 


REMEMBER TO SEND IN YOUR ARTICLES FOR THE NEXT NEWSLETTER 
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Letters 


Prem Holdaway 


I have entered both of Mr Rudnicki’s programmes, Missile command 
and Canyon, but have not been able to get any control keys to 
work even though I have checked my typing several times. 7 


Has anyone else been able to get the listings of the two games to 
run ? If so please write in or even supply a copy of the 
programmes on disk. | 


O.C. Walden Milton Keynes 


Congratulations on the aquisition of the MDEX software and 
enhanced coverage in the newsletter. I have been using the core 
system for some years now in particular for all my assembler 
programming. Perhaps now with affordable support we shall be able 
to eradicate some of the resident bugs. As you may know mdex 
files are not written to consecutive sectors on the disk but use 
interlaced sectors as defined in the Precsession table. I have 
written a routine to use this table to dump Mdex files in the 
correct sequence while in native Cortex mode. This obtains the 
full power of MDEX Editor ASM etc to write files and programmes 
for either mode. Would this be of interest to others. 3 


I should think a lot of users would be interested please send 
more details. Also send in more details of any resident bugs you 
know of in MDEX so that we can try to find a solution. : 


P.J. Riddle Edinburgh 


I am writing for the first time about my Cortex It has laid 
dorment for some time but seeing your newsletter has rekindled my 
interest. Mine is a much modified system but here are the basics. 
Cortex with 9909 disk controller, 8" disk drives with a basic 
dos I wrote from scratch, Real time battery backed up clock, 
Battery backed up static ram, 20 meg hard disk interface ¢ not 
yet completed ), Eprom programmer ( not yet completed ). 
As you can see I have been quite busy. And its a great pity the 
99xx range has not prospered as it is a good standard. The reason 
for writing is ask if you can supply MDEX on 8" Bootable disks. 


Yes indeed all MDEX and CDOS software can be supplied on 8" disks 
but only in single sided. I am sure many members would be 
interested in more details of your add-ons especially the hard 
disk interface and eprom programmer. Why not write an article or 
two for the newsletter. 


Nigel Osmond Glostershire 


Did MPE release the NOS operating system,which 1s the big brother 
of MDEX, to the User Group. 


No up to date we do not have NOS for sale. 


[G-S 
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letters 


Dick Hall Scotland 


I already have MDEX P.D.S. but do not have the source listing of 
MDEX.REL. I have modified-my device drivers to accomodate. a 
parralel printer but would also like to eon the main system 
programme if source is available. 


As. far as I know source code was never available for. MDEX.REL but 
it “should be possible to re-produce it using Anthony Rowell.'s 
dissasembler. If any other users have already done so could you 
please send a copy in to the user group. 


D.L. Wright Fife 


I have a Cortex running MDEX which I use to research into 
computer security. I am now planning to install a C.D.C. witha 
36 Megabyte winchester and I am faced with drastic operating 
system changes. As I have 192K of memory available Stephen Pelc 
at M.P.E. has advised me to-install NOS and use this to bring the 
winchester on line. I have lost touch with the User Group but now 
wish to re-join both to take advantage of the software 
availability and to make contributions to the Newsletter for this 
exellent machine. I also have a TMS 32010 evaluation module which 
uses a TMS 9995 to interface to the D.S. P. 


At the moment we do not have NOS available from the User Group 
but if you can obtain it from M.P.E. I’m sure many of our readers 
would be interested in the results you get from. interfacing a 
winchester drive. We look forward to hearing more from you in the 
future. 7 


AS you can see there has been quite a lot of interest. ins MDEX so. 
far. I would like to take time to say thanks to Rex Collins. ‘who 
is trying to answer all queries that we recieve from MDEX users, 
and also toa Anthony Rowell who has been of) great assistance on 
the subject. The biggest burdon to us with MDEX distribution is 
photocopying the manuals. Prem Holdaway has volunteerd to type 
the MDEX user guide into a file that can be printed by the user. 
This would enable us to distribute manuals on disk. If anyone is 
interested in typing up any more manuals please let us know. 


We have details of a few Cortex computers for sale on the second 
hand market, both Mk I and Mk II. Some have disk drives and other 
extras fitted and some software is included. Prices range’ from 
arround £50.00 to £180.00. If anyone would like to get hold of a 
second machine to use or just to keep for spares please let us 
know and we will pass on the information. 
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~» PAINT and DUMP for Centronics 739 Printers 


5E00 
SE04 
S04 
S08 
SE0C 
SEL0 
S14 
SEL4 
S18 
SELA 
SELC 
SELE 
SE22 
SEZ4 
SEZ4 
SE28 
SEZA 
SEZE 
SES0 
SE94 
SEQ6 
5E39 
SESA 
SESC 
S40 
SE 42 
SE4S 
SE49 
SEAA 
SE4C 
SE AE 
SE50 
S52 
S54 
S58 
SESC 


0000 


W.D. 


Eaves 


Please find enclosed two listings which will be of use to peaple who use 


Centronics 73% printers. The first listing is a variation on the ‘PAINT’ 
program in Newsletter 4 and the second is a ‘DUMP’ program based upon the 
methods used in ‘PAINT’ The listings are the result of an exercise to 
convert the potentially useful programs into a form which I could use and 


also in order to learn more about programming in machine code. 


PAINT 


This program produces the same type of output as Tim Gray’s ‘PAINT in 
Newsletter 4. An A4 size sheet is produced with each pixel mapped onto a 
4x3 matrix depending upon its colour. The translation is exactly the same 
although the data in the table looks different. This is simply due to the way 
the data is prepared for the printer. The 3 bits representing pixel dots are 
stored in bits 1-3 of a byte in my pragram and bits 5-3 in the Epsom printer 
version, As with the original ‘PAINT’ the cade 1s entirely relocatable. 


O20A LT 
068A BL 
C26 MOV 
0226 AL 
CABE MOV 
CABE MOV 
LOAF JM 


0007 DATA = 


0707 SETO 
0707 SETO 
07058 SETO 
O2ZOS "LI 
0507 NEG 
0507 NEG 
0502 NEG 
0507 NEG 
0207 LI 
0003 DATA 
0205 LT 
0500 NEG 
0700 SETO 


0002 DATA = 
0007 DATA 


0207 LI 
0500 NEG 
0200 LI 
0000 DATA 
0000 DATA 
0000 DATA 
0000 DATA 
0000 DATA 
DATA 
DATA 
I 
MOV 
NOP 


0000 
0201 
CAB 
1000 


get 


R10,>0456 
R10 
Rii,RLO 
R1i,-004A 


ier 


Set Ue One 


R1iL,@>0082 (CK 10) 


Ril,@°00E6 


70008 
RS5,20500 
0 

KO 


KO,20000 
+0000 
>0000 
*0000 
+0000 
>0000 
>0000 
*0000 
Ri, >00EF 
R1i,@20046 


OCKL0> 


OL» UNIT FLA 


x STOR AC E 
y 


orn CURSOR Posrri0Nn 


Colour eEluenen FROM ‘con! 


2 Ser 
CRiI0) 


\6-5 


Cooldk TarRLe 


FOR 


y=149l 


To BE 


DATA - 


VARIABLES 


RELOCAT ARLE 


ee Se 


el oe 
wt & 4 


WEB 
mE Gl 
iy 
ZA 
SEZ A 
GAL 
“i 3 0 
i) cots 
SEBS 
WEEE 
TEBE 
GE BE 
EY 2 
ete 

MEF G 
SEO 
me AL 
SEA 
EAG 
SEAS 
OE AE 
SEE 4 


sarees 


SEES 
SEA 
SIE BE 
EC 0 
WEC4 
YECS8 
BECA 
YECE 
TED O 
SED4 
IEDS 
WEDS 
GEDA 
YEDC 
GEE? 
SEES 
DEES 
SE EC 
SEE E 
SEF 2 
GES 
SEF 8 
SEF A 
EFC 
WEFE 
uF QZ 
uF O4 
wer OS 
wr OA 
ar OC 
ak OE 


C0 é 0 
14602 
cr AQ 
CAA0 
0201 
Ceo 
0201 
OF O41 
O20 1 
OF O04 
0201 
OF Ot 
0201 
Or O4 
O20 4 
Or O 4 
LOO 
O4EA 
CAA 0 
1000 
() “FE Ay 
LO00 
DSBZrr 
DB2ZA 


0420— 


0000 


DOAA 


1404 
DOAQ 
0242 
0982 
0203 
38C2 
0224 
ALOA 
Di74 
DIE4 
DIF 4 
82 0 
042 0) 
0000 
DOAA 
1404 
DOAO 


0242. 


0°82 
0°35 
0936 
09°37 
0203 


38C2 | 
0224: 
ALOA. 


Di74 
DIE4 
Dak 4 


MOV 
ANE 
xOF 
MOV 
lcsk 

MOV 


1 

WE TT 
bo 

WRIT 
local 

Whe TT 
NOE 
CLR 
MOY 
NOF 
CLA 
NOF 


MOVE 
MOVE: 


LW 
DATA 


MOVE: 


JNE 
MOVE: 
ANDI 
SFL 
LI 


MOVE: 


MOVE: 


' @F1C9E 


@20026,K1 
SESS 
@>0030,14 


@:001E,@20042 (R10) 


1, 20008 P - ae 
R1,@20018 


Kil, 20A00 
grt 
Ki ys Ope O 
awe 
Ri y? 
RL 
Kiyo 2500 
hs 
Ri ra 
Nd. 


B00 


3000 


(0044 ¢R10) 
G>EE36,@20046 (R10) 


Yr O04A (R10) 


bP iperaberdnrcciet 
“O047(R10),@2EES3 
PLCPE 

“0000 
@-004ACK10),R2 


fa fa fal 


SECS 
@°0548,K2 
R2,>0F 00 


| KR4+,KR5 
| KR4A+,RSG 


rt KR A+ h7 


@>1D49,@°EE36 


“0000 


( @S004ACR10),RZ 


COEF S 


| @20548,R2 


R22 ys 


‘OF OO 


Ra°> *0003 
RZ2,R3 
4 y=: ‘OO014 


R10,R4 
S KR4+, KS 


KR4A+ RG 
KRA+ RZ 


lé - 6 


se a ee 


CHeck 1Fin GRAPH Mone 


GToRE Ovcd Unit FLlAc 


SET To UANITAZUNIT—I. 


LiNn€é FEED 


EvARc~e 3 GeRrvPrics Roarives . 


xX =O 
Ahn Curksoe 


SET 


STORE Pas orion) 


CLEAR DATA STORE FoR CocreuaR 


SET CURSOR 0 x7 


GET cocouR 


In RZ 


i- ez 
THEN CET LuekeNnT BACK CROwW» 


STORE 
iD 


fut ATA iw CSR OOF: er 


Ger APPRoeriatre PIAEL KATA. 


PIXEL DATA TO MSB or RE, Rb, R 


CUuRsoR = Xtl, Y 


CAME AS SEB* AO SECY 
PixEL DATA To Tor 3 Bits e& LSR 


SAME AS BECCA te SEDA 


SPQ 


Sr 4A 


BF AE 
SE S2 


OAR 


ms aA yt 
. UR 


AG? 
Oa 
Oa 
User 
OF OS 
OF 06 
OF O07 
0424 
0204 
BO 6A 
LOE? 
W207 
Or 07 
0207 
OF O07 
0201 
CAG IL. 
OSE A 
020 1 
SO 6A 
LZAS 
0204 
OF OL 
02014 
OF OL 
CBZA 
CBZA 
0380 


SLA 
SLA 
GLA 
Al 
AL 
AL 
Wh TT 


WRIT 


WRIT 
DEC 
La 
oa 
JNE 
Bee 
WIT 
cr 
WELT 
LI 
MOV 
INGT 
LI 

C 
JLE 
it 
WHIT 
Lt 
WELT 
MOV 
MOV 
RTWE 


hoo 3 


6,3 


R743 
RS, 22000 


RO se 2000 


RZ, 22000 


RS 

ee) ; 

KZ | — 
@-Q044h°(R10) 

Ri, SPRFR 
@-O046(R10),h1 


BEAR 


R7,20D60 

7 

RZ, = 0400 : 
R77 

Ri, = 00EF : 
RL, @2 0046 (R10) 
@=0044(CR10) 
Ri, 00FF 

@> 0044 (R10)9,R4 
=BEAP 

Ri, 71600 

RL 

Ri, 21360 

RL | 


@0042°R10),@2001E 


@ 70046 ¢(R10),@5EES6 | 


EXAMPLE OF DUMP OUTPUT 


t 


FEARRNNGE DATA FoR PRINTING. 


DATR To PRINTER 


y=y¥-l eae 
FEF Y«< 7 -! THEN LooF. 


PRINT Line FEED OR. 


Y=14) 


~ = x42 
If X<=24545 THEN Loor 


SET 


DisABLeE GRAPHICS on PRINTER 


Reser OLD UNIT FLAG AND CARSO! 


To BASIC: 


SE00 
SE04 
SEOd 
S08 
SEOC 
S10 
SE1L2 
SE14 
SEL A 
S18 
SELA 
SEAC 
SELE 
SEZ 0 
S24 
SE28 
SE2C 
S30 
SE 94 
SI 3G 
SE3C 
SESE 
542 


wh 48 


a) oe 


ESO 


| opie baad peed : 
a) a is 


EG 
EA 
ed esd be 
DESO) 
EA a 
IOS 
EE B 
WE Gls 


a es poe 
Pr Je eee 


DUMP 


This program produces a screen dump to printer using forearound & 
background colours only. This is useful for dumping screens af anly two 
colours though a full coloured screen can be dumped to printer though noo 
representation of colour can be seen, Each pixel is mapped to a “xé matrix 
which ig either black or white only. Using a smaller matrix has the 
advantage of speed where no colour representation is required. Also the 
printout does not require rotation through 70 degrees which a ox- 
representation does. | 


The notes on the listings should provide all further information as toa haw 
the routines works 


0204 
Q48A 


1007 
0000 
0000 
0000 
0000 
0000 
0000 
1000 
046A 
0204 
C801 
C060 


tL 


Casi 


C0460 
14602 
ZF AQ 


CAAD | 


0204 


CeOL 
vale 


OF O4 


O201 


OF O04 


0201 


OF OL 
0201 
OF Ot 
O20 1 
OF Od 
L000 


eas 8 
on 
MOV 


: AL 
* MOY 


IMF 
PATA 
DATA 
DATA 
DATA 
DATA 
DATA 
NOF 
CLR 
LT 
MOV 
MOV 
ANDT 


1 
WRODT 
NOP 


Poe eg 


R1i,@>001E 
R1,*0A00 

Ri 
R1,20D00 
Ri 
Ri,>1e00 
RA | 


3000 


en oe 


RIG, 20456 
Rid 
Rit,R10 
Rit,-0014 
Ril,@2-0114¢°R102> 
SE 2 O 
=0000 
>0000 
=0000 
*0000 
=0000 
*0000 


OLD “AN IT 
Y 
x 
OLnN CURCOR. 
CoLaik FROM LOL 


BAGKeAGUND cworcokh 


@:O0L0CRI0) 

Ry EESS 2 
Ri,@-1b12 
@:0548,R1 
R1L,>OFO00 ~ ; 
Ri,@:0016¢R102 


~—6O002Z6,K1 ; 
“  @70030,14 


inaoe 


250) 


16 -% 


7M 


RELOCATABLE CODE 


VARIABLE  STORACE 


X20. 
COL 


SET 


DISABLE CoRRECTION 


Sroee LuarewtT BacKheroundy CorsuR 


CHECK tf IN GRAPH mobée 


SAVE old UNIT & SET NEW UNIT 


Ser up PRinTER .- 


SE7O O4Ea CLR @.000ECRLO) ser YO. 
SE74 CAAQ MOV @>EEGG,@=0012¢R10) | STORE 
S74 1000 NOE 

SE7C OFFA CLR @20014¢R10)— 


oop ChRson © 


OS 
wh BC 
ne Ble 
wk Be 
wk? 4 
iB 
GEO A 
JESU 
EL AQ 


SEAA 
SEAE 
SEE O 
SERA 


ELLE G 
GEE 8 
EEC 
ERE 
JECO 
olkl4 
SEC8 
SECC 
SECE 
SED 2 
WEDA 
WEDS 
ZEDA 
ad 
SEE 
GEES 
SEES 
oa 
ser 0 
ke Poe. 
EFS 
EF & 
wk C 
chee 
ak 04 
oF OA 
wl OF 
wr LZ 
eat 
a a 
oc a 


DBZA 
1000 
046AA 


Bs is 
(0SA0 


Ns 
LO0g 
0 GA 
D142 
SA 0 
() 2 
1000 
JQoAR 
D142 
(Hrért 
1000 
DATS 
() 20755 
OF OS 

OF 0% 
OSAA 
0201 
B80 6A 
12D7 
0207 
OF O7 
0207 
OF O07 
1000 
O4EA 
OSAA 
O SEA 
(20 1 
B06A 
LZC7 
207 
OF 07 
0207 
OF O7 
CEBZA 
CB2ZA 
0204 
(790 iL 
0380 
1000 
L000 
) +42 0) 
J00 9 
COREA 
pane 
a) if y Fe 3 
1302 
eal 
() ay un 1 Fe 
1000 


MOVE 
NOF 


ss 
{-: | 
on 


MOVE 


INC 
Skt. 
NOE 
i L.. 

MOVES 
TNC 
SFL 
NOF 

IL. 

MOVE 


NOF 


SLA 


AT 
WRIT 
WRIT 
INC 


LI 


C 
JIE 
LI 
WET T 
LI 
WATT 
NOF 
CLR 
TNC 


INCT 


ms & 

CC 
JL 
I 
WRT 
‘oo 
WRIT 
MOV 
MOV 
L.1 
MQV 
RT WE 
NOM 
NO 
BLE 
DATA 
MOV 
CLR 
te 
JEG 
|. 
KT 
NOP 


RS y 


RT 9 
R7 
R7 s+ 
7 


a: 
(2°: 


@Pd1iZcRio 
2 ; RS a, 


GEES 


hoe 


puss 
ARS 


Q2EESS 


ae ee 


enh 


oo 
ot Gove 


Rog 


RS 
RS 
(2 *: 
R152 


moe, ie 


@-O0L0¢R10) 
‘DODGE CRIN) 
‘QQOECRI0O> 
Ri, >00EF 

a ‘OOOECRI0),R1 


SHE 


RT “LEO 0 


7 


KZ, 21300 


wd 


@:000C (R10) ,@ 
@=O0012CR10),@2 
Ri? ee 


Ki ,@> 


Qs 1CPK 


=O000 


Rae 


ae 


26 
2» 0300 


2000 


QOLQCKA0) 
-QORF 

Ge “00 re 
OAD 0 


“0D0 0 


@-O0LaCRIOD, 


‘EES 


36 wor, oP 


16-4 


SEGQ DBZA MOVE: @>G00F (R10) ,@2EE37 ) 
@>0014 (R10) 8 


Cursor = xX Y- 


GET lWLoR —~ RE 
Luksa R = x, Yel 
CoOcaviR  -> BELOW MSA 


LocourR > RS 


Cursor = x, %#+2 
Coc Gur —>» fhedov MSR 


LOLOUR > RA 


Pearennoce- & PRiwr DATA. 


x =X+t fo we X <= 258 Then Loo 


Paint LE & CR 


SET Xx -O 


y= ¥#3 iF Y¥ K= IG! THEN LOOP 


RESET PRINTER 


RESTORE uN VT 
CORRECTION 


Cursor & COL 


To BASIC 


SURROUTINE To GET COLOUR .- 


1 CO. RBACKec-Rouwd RQ =O 


LCE R2° 235 


ry) i 


eS Sa ee 


Double stepping disk drives | W.R. Bucknall 


If your disk drives do not have double pulsing for 40/80 trk switching 
the circuit below can be used. AS can be seen from the timing diagram 
the TMS 9989 outputs a@ squarewave of period 2*STEP. The drive steps on 
the trailing (rising) edge, hence the second pulse must be generated a 
given time after the trailing edge when the STEP tis inactive. The 
given time is stated in the manufacturers handbook as minimum time 
between STEP pulses. For Canon's MDD2208 this is 3ms (210, & 110 6ms). 
Monostable, ICia triggers on the trailing edge of the STEP pulse for a 
period of @.45*R1*C1 ("“4.5ms for the given components). The falling 
edge triggers the second monostable, ICib which gives the second STEP 
pulse (“ims for given components). The total period of the monostables 
must not be greater than STEP (as set up in CONFIG, 10ms in this case) 
as can be seen from the timing diagram. This second pulse is gated 
with TRK@@ to prevent head crashing (like head banging but without 
Marilion or Iron Maiden). It is then mixed in IC2a with the original 
STEP input to give the double pulse o/p. An open collector NAND is 
used to reduce chip count, hence the pull up resistors. Normal 8O@trk 
operation is achieved by holding the CLR i/fp's low, preventing the 
monostables triggering. 


More on Control Keys W.R. Bucknall 


Further to John's article on single Keys for control in igsue twelve 


page 13. All ASCII control characters, bar 5 are available as single 
keys (unaffected by CTRL or SHIFT without diodes) by connecting the new 
Key-switches to the un-used matrix positions as listed below. Also 


listed are the functions of the other spare matrix positions (affected 
by CNTRL & SHIFT). Xn & Yn refer to the matrix positions as on the 
eircuit diagram. As can be seen SO, Sii DC2, DC3, & DCH are not 
available as single Keys. 


Matrix | ASCII CONTROL HEX Used Positions 


XO, Y@ NUL Null “@ <OO> 
XO,Y1. SOH Start of Header “A <@1> 
X@,Y2 STX Start of Text “B <@2> 
XO, Y3 ETX End of Text ea <O3> 
XO, Y4 EOT End of Transmission “D <@u> 
: ENQ Enquiry “E <@5> EDIT key 
X8,Y6 ACK” Acknowledge “F  <@6> 
XO,Y7 BEL Bell | °“G  <87> 
BS Backspace “H <88> <— key 
HT Horizontal Tab ssf <@9> — key 
LF Line Feed ge <@A> vy key 
VT Vertical Tab “K <@B> * key 
FF Form Feed “L <@c> CLEAR key 
CR Carriage Return “M <@D> RETURN Key 
so Shift Out “N <®E> © no single key 
SI Shift In “Oo <@F> ~ no single key 
X1, YO DLE Data Link Escape “p <18> ~~ | 
XO, Y8 pci Device Control 1 *Q <11> | 
DC2 Device Control 2 “R <12> no single Key 
DC3 Device Control 3 “Ss <13> no single key 
 pck& Device Control 4 as ly <14> no single key 
X1,Y5 NAK Negative Acknoledge “U <15> 
SYN idle Synchronige “Vv <16> INSERT key 
ETB End of Tx'n Block “W <17> DELETE Key 
X1, Y8 CAN Cancel “Xx <18> 
X1,Y9 EM End Medium “Y <19> 
X1,Y1@ SUB Substitute SZ <1A> 
ESC Escape ; | “{ <1B> ESCAPE key 
X2,Y1 FS Form Seperator “\ <1C> 
X2,Y2 — GS Group Seperator ~] <1D> 
| RS Record Seperator oe <1E> HOME key 
Xx2,Y4 US Unit Seperator ae <1F> | | 
DEL Delete <7F> RUBOUT Key 


Other unused matrix positions are as below, as normal, shift,control. 


x8, Y9 


P @ DLE 
X8,Y10 O 2 SI 
X1,Y1 K [ VT 
X1,Y2 L \ FF 
X1,Y3 N ss SO 
X1,Y4 M ] CR 
X2,Y5 < < NUL 
X2,Y6 > > NUL. 
X2,Y7 : » NUL 
X2,Y9 . 7 NUL 
X3,Y3 = DEL US 


FE a eR i. Oe Se 


MDEX software for the Cortex. 


The article about MDEX software in the last newsletter has caused 
some mis-understanding. Firstly I did not intend to imply that 
the software was no longer copy-write protected. The whole of the 
system is still protected by copywrite of John Walker ex 
Marinchip Systems and Stephen Pelc of M.P.E. My note about the 
copy-write was just to set a price assuming any royalties payable 
were low enough for us to pay without having to adjust the price. 
In fact we have agreed to pay 20% of the selling price to M.P.E. 
for distribution to the appropriate writers. 


The Forth and Nautilus cross compiler systems | have not been 


reieased to the user group after all. Apparently they got mixed. 


up the pile of disks collected from M.P.E. by mistake. They have 
now been withdrawn from our list of items for sale. We hope to 
have a public domain version of Fig-Forth available to run on 
CDOS format disks as an alterative in the near future. 


MDE X software available is as follows :- 


MDEX ( Marinchip Disk Executive ) is a disk operating system 
Similar in some respects to CPM. It was originally developed by 
Marinchip in the U.S. for computers using the T.I. TMS9900 
proccessor. It has been modified by M.P.E. in England for use on 
the Cortex. 


MDEX CORE :- with Debug monitor, Text editor, Basic | £10.00 
ASM & LINK :— Assembler and Linker | £18.88 
SYSGEN :- ee generation Kit | —s« £10. 88 
WORD :- Word processor | | | | £18.88 
MDEX-PDS :- All of the above systems in one package £30.00 
SPL :- System programming language | | £10.00 
META :-— Compiler generator £10.90 
QBASIC :- Basic compiler £15.00 
PASCAL :- Sequential Pascal £10.00 
WINDOW :- Full screen text editor £iS. 00 
SPELL :- Spelling checker 7 | £10.02 


All the above MDEX software is now available from the Cortex User 
Group at the normal address. All have good documentation, exept 
Pascal which has very little but many referances to published 
books are given. 
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Pang D- 
QBASIC. N D Ostrond. 


In this issue i will describe some of the other commands used ir. 
QBASIC,starting with the '’CHAIN’ command. The CHAIN statement allows 
a Q@BASIC programme to pass controll to another programme,it may 
be another QGQBASIC pragramme or to ane of the operating system utility 
programmes for example:- CHAIN "WINDOW"+TEXT.FILE following 
this statement the QBASIC pragramme would call the editor 
"Window’ and open the, file called TEXT.FILE ready for editing. 


String handling commands are plenty,with commands such as OVERLAYS 
which will put part or all of one string into another. ae | 
Another is the "¥" command:ie AS=" "*¥9 which will put nine blanks 
imto the string AS. | 


As well as the single line function declaration Qbasic supports a 
Multiple line function,this means that after the function declaration 


on the first line any number of qbasic statements may make up the 
the function bady.The function is ended by the FEND statement.Below is 

an extract from the qbasic manuel , the function takes two string 

arguments,LINE®S & WORDS,& returns an integer equal to the number of 

occurrences of, WORDS in LINES. 


DEF FN.WORD.COUNT% (LINES, WORDS) 


I%=O0 {Occurrences found 3 
K%=1 {Offset into string for search} 
WHILE 1 


I%=MATCH (UCASES (WORDS) UCASES (LINES) , K%) 
EXIT IF J%=0 


I%=I%+1 

K%=J%+LEN (WORDS) 
WEND 
FN.WORD.COUNT=I% 
FEND 


The MATCH statement searches LINES for the pattern WORDS, 
UCASES converts all lower case characters in a string into upper case. 


The above can be used as a subroutine or more important the function 
can be a subprogramme which would be compiled seperately, then linked 
to the main programme and called simply by the statement: — | 
DUMMEY%=FN.WORD.COUNT%,but more of this later,i would like ta finish 
with the file input/output statements. © 


OPEN statement 
OPEN <expression> CRECL <expression> AS <expression> CBUFF ¢exp? 


The OPEN <exp>,exp=the file name 
RECL <exp>,exp=record length,if used the file is random access 
BUFF <exp>,exp=buffer size,if used the buffer space the file uses 
can be controlled,if a large buffer is allocated 
the performance of a programme can be improved by 
reducing the number of disc accesses, 
AS <exp>,exp=file number 1 to 20 Alsa more then one file may be 
opened with one OPEN statement. eg: - 


LG .U% 


OPEN "2/MYFILE" AS 1,"2/YQURFILE" AS 2 
OPEN "2/MYFILE" AS 1 BUFF 10 
OPEN "2/MYFILE" RECL 145 AS 1 ranom access 


CREATE statement | | | 
CREATE "P/MYFILE,130" AS 1 Will create a file 130*¥128 bytes 


GETFILE statement : 

Will open the named file if it exists if it does not it will 
automatically create it safer to use than CREATE which would destroy a 
prevously created file. | 


READ statementiwill read one or more varables from a sequential file 
PRINT and PRINT USING statementj;ill write to a file 

IF END test end of file 

GET & PUT similar to PRINT & READ but faster 


A file may be opened and read then written to at any point in a. 


sequential file or test for the end of a file then add to it. With 
the NOS operating systern (MDEX’s big  brother-is it available ?) 
records can be locked. 


The CALL & ADRS statement is used to envoke a assembly language 
module,values can ,be passed to the madule from the main pgm and. back 
again. 
ie:-CALL SRC (ADRS(VALUE%) , COUNT%) ps . 

The assembly pgm SRC will be called & COUNTS & VALUE% will be 
passed. : | | a | 

VALUE®% it’s address will be passed to G@BASIC’s stack riG this 
allows a value to be returned. | 
COUNT% the value in count% will be put on the stack. 


Assembly language example fram the QBASIC manual: - 


idt "SRC" 
dstk r1o 

srckt data | regg,srcl BLWP vector for entry 

srcl mov 20(r1i3),r10 load caller’s stack pointer 
popr ro pop value of COUNT% into roO 
popr - ri pop address of VALUE®% into rl 
mov ¥ri,r2 lead argument value - 
src r2 shift r2 by count in rOQ 
mov re, kr1 store back in VALUE%® address 
mov rio,20(r13) udate @BASIC’s stack pointer. 
rtwp . return to QBASIC 

regg bss 32 | register workspace 
end 


Next month linking with assembly pgms & linking QBASIC Modules. 
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